home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 15 / Amiga Plus Leser CD 15.iso / Tools / Development / yacas_alg / yacas_morphos / share / yacas / include / lispstring.inl < prev    next >
Encoding:
Text File  |  2002-03-13  |  712 b   |  33 lines
  1.  
  2. // LispString inline functions.
  3.  
  4. inline LispString& LispString::operator=(LispCharPtr aString)
  5. {
  6.     SetString(aString,iArrayOwnedExternally);
  7.     return *this;
  8. }
  9.  
  10. inline LispString::LispString(LispString &aString,
  11.                               LispBoolean aStringOwnedExternally)
  12. {
  13.     SetString(aString.String(), aStringOwnedExternally);
  14. }
  15.  
  16. inline LispString::LispString(LispCharPtr aString,
  17.                               LispBoolean aStringOwnedExternally)
  18. {
  19.     SetString(aString, aStringOwnedExternally);
  20. }
  21.  
  22. inline LispString::LispString(LispBoolean aStringOwnedExternally)
  23. {
  24.     SetString("", aStringOwnedExternally);
  25. }
  26.  
  27.  
  28. inline LispCharPtr LispString::String() const
  29. {
  30.     return (LispCharPtr)iArray;
  31. }
  32.  
  33.